(in-ns 'miked.util)
(clojure/refer 'clojure)

(defn get-clear-bits [bitset bits]
  (let [clear? (fn [bit] (= false (. bitset (get bit))))]
    (filter clear? bits)))

(defn get-set-bits [bitset bits]
  (let [clear? (fn [bit] (not (= false (. bitset (get bit)))))]
    (filter clear? bits)))

